home *** CD-ROM | disk | FTP | other *** search
/ SuperModels in the Rainforest / SuperModels in the Rainforest.iso / rain.dxr / 00539.ls < prev    next >
Encoding:
Text File  |  1995-10-13  |  1023 b   |  38 lines
  1. on namechange
  2.   global gsMovieDir
  3.   set holder1 to gsMovieDir & "dummy" & "1" & ".mov"
  4.   set holder2 to gsMovieDir & "dummy" & "2" & ".mov"
  5.   set holder3 to gsMovieDir & "dummy" & "3" & ".mov"
  6.   if the fileName of cast "tempmovie" <> holder1 then
  7.     set the fileName of cast "tempmovie" to holder1
  8.   else
  9.     nothing()
  10.   end if
  11.   if the fileName of cast "tempmovie2" <> holder2 then
  12.     set the fileName of cast "tempmovie2" to holder2
  13.   else
  14.     nothing()
  15.   end if
  16.   if the fileName of cast "tempmovie3" <> holder3 then
  17.     set the fileName of cast "tempmovie3" to holder3
  18.   else
  19.     nothing()
  20.   end if
  21. end
  22.  
  23. on namechange2
  24.   global gsMovieDir
  25.   set holder1 to gsMovieDir & "dummy" & "4" & ".mov"
  26.   set holder2 to gsMovieDir & "dummy" & "5" & ".mov"
  27.   if the fileName of cast "ShotMov1" <> holder1 then
  28.     set the fileName of cast "ShotMov1" to holder1
  29.   else
  30.     nothing()
  31.   end if
  32.   if the fileName of cast "ShotMov2" <> holder2 then
  33.     set the fileName of cast "ShotMov2" to holder2
  34.   else
  35.     nothing()
  36.   end if
  37. end
  38.